Reset MSBs of arguments of MAKE_CHAR.

diff --git a/src/charset.c b/src/charset.c
index 91f510476a0813cf74734928cc5c4b7f2e4372d8..66d53003b0deaf887e59e78bd0ae6fd8c401694d 100644 (file)
--- a/src/charset.c
+++ b/src/charset.c
@@ -423,7 +423,7 @@ translate_char (table, c, charset, c1, c2)
   Lisp_Object ch;
   int alt_charset, alt_c1, alt_c2, dimension;
 
-  if (c < 0) c = MAKE_CHAR (charset, c1, c2);
+  if (c < 0) c = MAKE_CHAR (charset, (c1 & 0x7F) , (c2 & 0x7F));
   if (!CHAR_TABLE_P (table)
       || (ch = Faref (table, make_number (c)), !NATNUMP (ch)))
     return c;